home *** CD-ROM | disk | FTP | other *** search
/ Aminet 37 / Aminet 37 (2000)(Schatztruhe)[!][Jun 2000].iso / Aminet / dev / asm / Tandem2.68.lha / Tandem / Projects / Asmfiles / test16.asm < prev    next >
Assembly Source File  |  2000-04-02  |  268b  |  23 lines
  1. * try this
  2.  
  3. Fred MACRO
  4.  moveq \1,d0
  5.  moveq \2,d1
  6.  moveq \3,d2
  7.  moveq \4,d3
  8.  moveq \5,d4
  9.  moveq \6,d5
  10.  moveq \7,d6
  11.  moveq \8,d7
  12.  move.w \9,a0
  13.  move.w \10,a1
  14.  IFGE NARG-11
  15.  IFNC '\11','#11'
  16.  move.w \11,a2
  17.  ENDC
  18.  ENDC
  19.  ENDM
  20.  
  21.  Fred #1,#2,#3,#4,#5,#6,#7,#8,#9,#10,#11
  22.  rts
  23.